library(shiny)

shinyUI(fluidPage(
  
  titlePanel("Demonstration of renderUI in shiny - Dynamically creating the tabs based on users inputs"),
  sidebarLayout(
    sidebarPanel(
      numericInput(inputId = "n",
                   label = "Enter the number of tabs needed",1)
    ) ,
    mainPanel(
      uiOutput(outputId = 'tabs')
    )
  )
))